perm filename SINIT[SAM,LCS] blob sn#437765 filedate 1979-04-30 generic text, type T, neo UTF8

COMMON TOOT;
FUNC FUN;
 
P13←F1; P10←45;
PLAY;TOOT 0 .1 A 1 F2 ;FINISH;